home *** CD-ROM | disk | FTP | other *** search
/ BBS Toolkit / BBS Toolkit.iso / qbbs / vd160r.zip / VDSAMPLE.ZIP / SPAWNBBS.BAT < prev    next >
DOS Batch File  |  1991-11-04  |  2KB  |  88 lines
  1. @echo off
  2. Cls
  3. Echo   SPAWNBBS.BAT - Binkley/RA       - Com1
  4. Echo                  by Cabell Clarke - 1:264/19
  5. rem
  6. rem  This file is called by Binkley either via the Batch or Spawn
  7. rem  options, when a human attempts to logon to QuickBBS.
  8. rem
  9. Echo.
  10. Echo                  Last Update: 24 Dec 90
  11. Echo.
  12.  
  13.        Male * SPAW Human entering BBS >> %log%
  14.        vfos_del
  15.  
  16.       :start
  17.        cdd d:\qbbs
  18.        ra -b%2 -t%4 -E20
  19.        goto after_quick
  20.  
  21.       :reload
  22.        cdd d:\qbbs
  23.        ra -R -E20
  24.  
  25.       :after_quick
  26.           if errorlevel 102 goto qmx
  27.           if errorlevel 101 goto validoor
  28.           if errorlevel  90 goto remote
  29.           if errorlevel  20 goto Exit
  30.           if errorlevel   5 goto net&echo
  31.           if errorlevel   4 goto echo_only
  32.           if errorlevel   3 goto net_only
  33.           goto exit
  34.  
  35.          :Qmx
  36.           Male ! SPAW RA/QMX Engaged >> %log%
  37.           rqsex286
  38.           goto reload
  39.  
  40.          :validoor
  41.           Male ! SPAW ValidOOR Engaged >> %log%
  42.           call validate.bat
  43.           goto reload
  44.  
  45.          :net&echo
  46.           Male : SPAW Exporting Netmail >> %log%
  47.           cdd d:\qbbs
  48.           mbutil export
  49.  
  50.          :echo_only
  51.           Male : SPAW Exporting Echomail >> %log%
  52.           cdd d:\qbbs
  53.           ZMailQ EE EP PA NS
  54.           goto bundle
  55.  
  56.          :net_only
  57.           Male : SPAW Exporting Netmail >> %log%
  58.           cdd d:\qbbs
  59.           mbutil export
  60.  
  61.          :bundle
  62.           Male : SPAW Bundling PKTS >> %log%
  63.           cdd d:\binkley
  64.           qmail pack
  65.           goto exit
  66.  
  67.          :remote
  68.           Male * SPAW Exiting to DOS via Sysop Menu >> %log%
  69.           cls
  70.           watchcd 0 on
  71.           ctty com1
  72.           cls
  73.           %COMSPEC%
  74.           echo STANDBY... Returning to BBS
  75.           Male * SPAW Returning to BBS >> %log%
  76.           cdd d:\qbbs
  77.           ctty con
  78.           watchcd 0 off
  79.           goto reload
  80.  
  81.          :exit
  82.           DTR ON
  83.           AT M0H1
  84.           next.exe 3/600/local.bat/donext.bat
  85.           Male + SPAW Exiting Normally >> %log%
  86.           cdd d:\binkley
  87.           bink
  88.